Unit
lmdeditb

Declaration

TLMDTextChangeEvent = procedure(sender:TObject;At : Integer) of object;